COMMENT ⊗   VALID 00002 PAGES
C REC  PAGE   DESCRIPTION
C00001 00001
C00002 00002	REQUIRE "⊂⊃<>" DELIMITERS
C00003 ENDMK
C⊗;
REQUIRE "⊂⊃<>" DELIMITERS;

DEFINE ∂=⊂COMMENT⊃;

DEFINE SP=⊂" "⊃,
      CR=⊂('15&"")⊃,
      LF=⊂('12&"")⊃,
      ↓=⊂(CR&LF)⊃,
      TAB=⊂('11&"")⊃,
      FF=⊂('14&"")⊃;

DEFINE THRU=⊂STEP 1 UNTIL⊃;

DEFINE INFINITY='377777777777; ∂ = 34359738367;
DEFINE NEGATIVE_INFINITY='400000000000; ∂ = -34359738368;